9 :GOTO100:
10 :SAVE"@0:T&T  ZUFALL(MC)",8:RETURN:
11 :
12 :
20 :REM---ZUFALLSZAHLEN(139-143)
21 :SYS57534:RETURN:---BILDEN
22 :SYS57502:RETURN:---INIT
23 :A=PEEK(53266):RETURN:--RASTERSTRAHL
24 :A=PEEK(56324):RETURN:---TIMER
25 :
26 :
30 :REM---TASTE
31 :WAIT198,1:GETA$:ON-(A$="")GOTO31:RETURN:
34 :
35 :
100 :REM---AUFRUF
101 :PRINT"[147]ZUFALL:[146] PEEK(139-143)"::GOSUB22:
102 :GOSUB20:FORI=.TO4:PRINTTAB(I*5)PEEK(139+I);:NEXT:PRINT:
103 :GOSUB30:IFA$<>" "GOTO102
104 :
110 :PRINT"RASTERSTRAHL:  PEEK(53266)"
111 :GOSUB23:PRINTTAB(POS(.)AND3)A;:GOSUB30:ON-(A$<>" ")GOTO111:PRINT
112 :
120 :PRINT"TIMER:  PEEK(56324)"
121 :GOSUB24:PRINTTAB(POS(.)AND3)A;:GOSUB30:ON-(A$<>" ")GOTO121:PRINT
122 :
130 :LIST20-24: